Apple WWDC 1996/WWDC96_1996 (CD).toast/Technology Materials/AMT/Sample AMT⁄PE Code/SOURCES/oOPENSCR_1.k

Text File | 1996-02-28 | 428 b | 28 lines | [TEXT/MPS ]

object oOPENSCR_1 is cDefaultContainer
with
    Binder is oBinder;
    Label is -1;
    Items is [
        oOPENSCR_PIC_1_5
    ];
end;


object oOPENSCR_PIC_1_5 is cPictureHandler
with
    Duration is -1;
    Supplier is oOPENSCR_PIC_3_;
    Behavior is cDefaultBehavior
    has
        MouseUp(theTarget, theX, theY)
            do
                oBinder.Goto(oMMENU_2);
            end;

    with
        Enabled is true; Shown is true;
        X is 0; Y is 0; Width is 640; Height is 480;
    end;
end;